home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 26 / Cream of the Crop 26.iso / os2 / pvm34b3.zip / pvm34b3 / pvm3 / libfpvm / WIN32 / Pvmfhostsync.c < prev    next >
C/C++ Source or Header  |  1997-07-22  |  536b  |  30 lines
  1.  
  2. /* $Id: Pvmfhostsync.c,v 1.1 1997/06/27 16:40:56 pvmsrc Exp $ */
  3.  
  4. #include <sys/types.h>
  5. #ifndef WIN32
  6. #include <sys/time.h>
  7. #include "pvm3.h"
  8. #else
  9. #include "..\..\include\pvm3.h"
  10. #include "..\..\src\pvmwin.h"
  11. #include <time.h>
  12. #endif
  13.  
  14.  
  15. #include "pvm_consts.h"
  16.  
  17. void /*__stdcall*/ __fortran
  18. PVMHOSTSYNC (host, sec, usec, dsec, dusec, info)
  19. int *host, *sec, *usec, *dsec, *dusec, *info;
  20. {
  21.     struct timeval t, dt;
  22.  
  23.     *info = pvm_hostsync(*host, &t, &dt);
  24.     *sec = t.tv_sec;
  25.     *usec = t.tv_usec;
  26.     *dsec = dt.tv_sec;
  27.     *dusec = dt.tv_usec;
  28. }
  29.  
  30.